home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 45 / 045.d81 / kamikaze duck (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  2KB  |  52 lines
  1. 5 ifa=0thena=1:load"kamikaze.ml",8,1
  2. 10 gosub60100:clr
  3. 20 poke53280,.:poke53281,.
  4. 25 print"[147]             [158][203][193][205][201][203][193][218][197] [196][213][195][203]"
  5. 30 print"            [194]y [194]uck [195]hildress
  6. 40 [153]"          (NULL) cont- (NULL)lay (NULL)atn(NULL)right$(NULL)atn(NULL)val str$(NULL)len(NULL)"
  7. 50 [153]"          (NULL) cont- (NULL)uit"
  8. 60 [153]"          (NULL)ress (NULL) contor (NULL)cont."
  9. 70 a[178][194](203):[139]a[179][177]41[175]a[179][177]62[167]70
  10. 80 [139]a[178]41[167][158]49152:[137]20
  11. 60000 [153]"on contatnre you sure you want to quit? ((NULL)cont/(NULL)cont)"
  12. 60010 a[178][194](203):[139]a[179][177]25[175]a[179][177]39[167]60010
  13. 60020 [139]a[178]39[167][153]"on                                     on":[137]60
  14. 60030 [159]15,8,15,"r0:hello connect=hello connect":[132]15,er:[160]15
  15. 60040 [139]er[179][177]63[167][128]
  16. 60050 [156]:[147]"hello connect",8
  17. 60100 pn$[178]"(NULL)atn(NULL)right$(NULL)atn(NULL)val str$(NULL)len(NULL)":an$[178]"peek(NULL):  peek(NULL)len(NULL) lenleft$right$(NULL)str$(NULL)val(NULL)(NULL)"
  18. 60110 bo[178]11:sc[178]15:cl[178]06:c1[178]12:c2[178]00:c3[178]12:c4[178]00:c5[178]00:c6[178]02:c7[178]09
  19. 60130 [151]53280,bo:[151]53281,sc:[153]"load";:[137]60250
  20. 60140 [151]646,c1:[153]" totototototototototototototototototototototototototototototototototototo"
  21. 60150 [151]646,c2:[153]" fn        (NULL)(NULL)atnstr$(NULL)(NULL)atn(NULL) (NULL)(NULL)val(NULL)val(NULL)(NULL)(NULL):        then"
  22. 60170 [151]646,c1:[153]" tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab("
  23. 60180 [151]646,c6:[153]""[163]20[171][195](pn$)[173]2);pn$
  24. 60190 [151]646,c7:[153]""[163]20[171][195](an$)[173]2);an$
  25. 60200 [151]646,c5:[153]""[163]13)"len(NULL)(NULL)(NULL)(NULL)right$chr$left$(NULL) 1986"
  26. 60210 [153][163]9)"len(NULL)(NULL)(NULL)(NULL)str$(NULL)(NULL)val (NULL)(NULL)peek(NULL)right$lenatn(NULL)right$(NULL)(NULL)(NULL)"
  27. 60220 [151]646,c3:[153]" totototototototototototototototototototototototototototototototototototo"
  28. 60230 [151]646,c4:[153]" fn                                  then"
  29. 60240 [151]646,c3:[153]" tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(wait";
  30. 60245 [151]198,.:[137]60360
  31. 60250 [151]646,cl
  32. 60255 [153]" *newnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewrnd"
  33. 60260 [129]a[178]1[164]3:[141]60470:[130]
  34. 60270 [141]60470:[153]"onusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusr"
  35. 60280 [129]a[178]1[164]16:[141]60470:[130]
  36. 60290 [153]"onandandandandandandandandandandandandandandandandandandandandandandandandandandandandandandandandandandandand"
  37. 60300 [129]a[178]1[164]3:[141]60470:[130]
  38. 60310 [153]" lognewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewnewwaitcos";
  39. 60320 [151]53280,bo:[151]53281,sc:[137]60140
  40. 60360 [153]"";
  41. 60370 [151]646,c2:[153]"fn(NULL)ress the [(NULL)(NULL)atnlenval peekatn(NULL)] to continue.then"
  42. 60380 [129]a[178]1[164]100
  43. 60390 [161]a$:[139]a$[178]" "[176]a$[178]"close"[167][142]
  44. 60400 [130]
  45. 60410 [153]"";
  46. 60420 [153]"fn                                  then"
  47. 60430 [129]a[178]1[164]100
  48. 60440 [161]a$:[139]a$[178]" "[176]a$[178]"close"[167][142]
  49. 60450 [130]
  50. 60460 [137]60360
  51. 60470 [153]" getwaitget":[142]
  52.